EuroCD 3

home *** CD-ROM | disk | FTP | other *** search

/ EuroCD 3 / EuroCD 3.iso / Programming / BlitzBasic / TRITONBLITZ / bbincludes / libraries / triton.bb2

Wrap

Text File | 1998-06-24 | 37KB | 1,284 lines

#LIBRARIES_TRITON_H=-1 ;** ;** $VER: triton.h 4.39 (24.6.95) - triton.bb2 ;** Triton Release 1.3 ;** ;** triton.library definitions ;** ;** (C) Copyright 1993-1994 Stefan Zeiger ;** All Rights Reserved ;** conversion to BlitzBasic2 by Philipp Lonke and Rupert Henson ;** Blitz2-Triton-Support and Infos ask phips@scout.franken.de ;** or ask in the blitz mailing list. ** READ THE DOCUMENTATION! ** ;** ; NOTE: One line of a macro cannot exceed 128 chars ; (just use extra macros - see LK1 - List Kludge 1 etc.) Macro TRITONNAME "triton.library" End Macro #TRITON10VERSION=1 #TRITON11VERSION=2 #TRITON12VERSION=3 #INTUI_V36_NAMES_ONLY=-1 ; this here is an addition to the amigalibs.res where this ; newtype is not defined NEWTYPE .AppWindow *aw_PRIVATE.b End NEWTYPE ;/* ////////////////////////////////////////////////////////////////////// */ ;/* //////////////////////////////////////////////////////////// Macros // */ ;/* ////////////////////////////////////////////////////////////////////// */ Macro EndProject #TAG_END,0 End Macro Macro WindowTitle #TRWI_Title,`1 End Macro Macro ScreenTitle #TRWI_ScreenTitle,`1 End Macro Macro WindowID #TRWI_ID,`1 End Macro Macro WindowFlags #TRWI_Flags,`1 End Macro Macro WindowPosition #TRWI_Position,`1 End Macro Macro WindowUnderscore #TRWI_Underscore,`1 End Macro Macro WindowDimensions #TRWI_Dimensions,`1 End Macro Macro WindowBackfillWin #TRWI_Backfill,#TRBF_WINDOWBACK End Macro Macro WindowBackfillReq #TRWI_Backfill,#TRBF_REQUESTERBACK End Macro Macro WindowBackfillNone #TRWI_Backfill,#TRBF_NONE End Macro Macro WindowBackfillS #TRWI_Backfill,#TRBF_SHINE End Macro Macro WindowBackfillSA #TRWI_Backfill,#TRBF_SHINE_SHADOW End Macro Macro WindowBackfillSF #TRWI_Backfill,#TRBF_SHINE_FILL End Macro Macro WindowBackfillSB #TRWI_Backfill,#TRBF_SHINE_BACKGROUND End Macro Macro WindowBackfillA #TRWI_Backfill,#TRBF_SHADOW End Macro Macro WindowBackfillAF #TRWI_Backfill,#TRBF_SHADOW_FILL End Macro Macro WindowBackfillAB #TRWI_Backfill,#TRBF_SHADOW_BACKGROUND End Macro Macro WindowBackfillF #TRWI_Backfill,#TRBF_FILL End Macro Macro WindowBackfillFB #TRWI_Backfill,#TRBF_FILL_BACKGROUND End Macro Macro CustomScreen #TRWI_CustomScreen,`1 End Macro Macro PubScreen #TRWI_PubScreen,`1 End Macro Macro PubScreenName #TRWI_PubScreenName,`1 End Macro ;V4 entry QuickHelp Macro QuickHelpOn #TRWI_QuickHelp,`1 End Macro ;/* Menus */ Macro BeginMenu #TRMN_Title,`1 End Macro Macro MenuFlags #TRMN_Flags,`1 End Macro Macro _MenuItem #TRMN_Item,`1,#TRAT_ID,`2 End Macro Macro MenuItemC #TRMN_Item,`1,#TRMN_Flags,#TRMF_CHECKIT,#TRAT_ID,`2 End Macro Macro MenuItemCC #TRMN_Item,`1,#TRMN_Flags,#TRMF_CHECKED,#TRAT_ID,`2 End Macro Macro BeginSub #TRMN_Item,`1 End Macro Macro MenuItemD #TRMN_Item,`1,!MenuFlags{#TRMF_DISABLED},#TRAT_ID,`2 End Macro Macro _SubItem #TRMN_Sub,`1,#TRAT_ID,`2 End Macro Macro SubItemD #TRMN_Sub,`1,!MenuFlags{#TRMF_DISABLED},#TRAT_ID,`2 End Macro Macro ItemBarlabel #TRMN_Item,#TRMN_BARLABEL End Macro Macro SubBarlabel #TRMN_Sub,#TRMN_BARLABEL End Macro ;/* Groups */ Macro HorizGroup #TRGR_Horiz,0 End Macro Macro HorizGroupE #TRGR_Horiz,#TRGR_EQUALSHARE End Macro Macro HorizGroupS #TRGR_Horiz,#TRGR_PROPSPACES End Macro Macro HorizGroupA #TRGR_Horiz,#TRGR_ALIGN End Macro Macro HorizGroupEA #TRGR_Horiz,#TRGR_EQUALSHARE|#TRGR_ALIGN End Macro Macro HorizGroupSA #TRGR_Horiz,#TRGR_PROPSPACES|#TRGR_ALIGN End Macro Macro HorizGroupC #TRGR_Horiz,#TRGR_CENTER End Macro Macro HorizGroupEC #TRGR_Horiz,#TRGR_EQUALSHARE|#TRGR_CENTER End Macro Macro HorizGroupSC #TRGR_Horiz,#TRGR_PROPSPACES|#TRGR_CENTER End Macro Macro HorizGroupAC #TRGR_Horiz,#TRGR_ALIGN|#TRGR_CENTER End Macro Macro HorizGroupEAC #TRGR_Horiz,#TRGR_EQUALSHARE|#TRGR_ALIGN|#TRGR_CENTER End Macro Macro HorizGroupSAC #TRGR_Horiz,#TRGR_PROPSPACES|#TRGR_ALIGN|#TRGR_CENTER End Macro Macro VertGroup #TRGR_Vert,0 End Macro Macro VertGroupE #TRGR_Vert,TRGR_EQUALSHARE End Macro Macro VertGroupS #TRGR_Vert,#TRGR_PROPSPACES End Macro Macro VertGroupA #TRGR_Vert,#TRGR_ALIGN End Macro Macro VertGroupEA #TRGR_Vert,#TRGR_EQUALSHARE|#TRGR_ALIGN End Macro Macro VertGroupSA #TRGR_Vert,#TRGR_PROPSPACES|#TRGR_ALIGN End Macro Macro VertGroupC #TRGR_Vert,#TRGR_CENTER End Macro Macro VertGroupEC #TRGR_Vert,#TRGR_EQUALSHARE|#TRGR_CENTER End Macro Macro VertGroupSC #TRGR_Vert,#TRGR_PROPSPACES|#TRGR_CENTER End Macro Macro VertGroupAC #TRGR_Vert,#TRGR_ALIGN|#TRGR_CENTER End Macro Macro VertGroupEAC #TRGR_Vert,#TRGR_EQUALSHARE|#TRGR_ALIGN|#TRGR_CENTER End Macro Macro VertGroupSAC #TRGR_Vert,#TRGR_PROPSPACES|#TRGR_ALIGN|#TRGR_CENTER End Macro Macro EndGroup #TRGR_End,0 End Macro Macro ColumnArray #TRGR_Horiz,#TRGR_ARRAY|#TRGR_ALIGN|#TRGR_CENTER End Macro Macro LineArray #TRGR_Vert,#TRGR_ARRAY|#TRGR_ALIGN|#TRGR_CENTER End Macro Macro BeginColumn #TRGR_Vert,#TRGR_PROPSHARE|#TRGR_ALIGN|#TRGR_CENTER End Macro Macro BeginLine #TRGR_Horiz,#TRGR_PROPSHARE|#TRGR_ALIGN|#TRGR_CENTER End Macro Macro BeginColumnI #TRGR_Vert,#TRGR_PROPSHARE|#TRGR_ALIGN|#TRGR_CENTER|#TRGR_INDEP End Macro Macro BeginLineI #TRGR_Horiz,#TRGR_PROPSHARE|#TRGR_ALIGN|#TRGR_CENTER|#TRGR_INDEP End Macro Macro EndColumn !EndGroup End Macro Macro EndLine !EndGroup End Macro Macro EndArray !EndGroup End Macro ;/* Display Object */ Macro QuickHelp #TRDO_QuickHelpString,`1 End Macro ;/* Spaces */ Macro SpaceB #TROB_Space,#TRST_BIG End Macro Macro Space #TROB_Space,#TRST_NORMAL End Macro Macro SpaceS #TROB_Space,#TRST_SMALL End Macro Macro SpaceN #TROB_Space,#TRST_NONE End Macro ;/* Text */ Macro TextN #TROB_Text,0,#TRAT_Text,`1 End Macro Macro TextH #TROB_Text,0,#TRAT_Text,`1,#TRAT_Flags,#TRTX_HIGHLIGHT End Macro Macro Text3 #TROB_Text,0,#TRAT_Text,`1,#TRAT_Flags,#TRTX_3D End Macro Macro TextB #TROB_Text,0,#TRAT_Text,`1,#TRAT_Flags,#TRTX_BOLD End Macro Macro TextT #TROB_Text,0,#TRAT_Text,`1,#TRAT_Flags,#TRTX_TITLE End Macro Macro TextID #TROB_Text,0,#TRAT_Text,`1,#TRAT_ID,`2 End Macro Macro TextNR !TextN{`1},#TRAT_Flags,#TROF_RIGHTALIGN End Macro Macro ClippedText !TextN{`1},#TRAT_Flags,#TRTX_CLIPPED|#TRTX_NOUNDERSCORE End Macro Macro ClippedTextID !TextN{`1},#TRAT_Flags,#TRTX_CLIPPED|#TRTX_NOUNDERSCORE,#TRAT_ID,`2 End Macro Macro CenteredText !HorizGroupSC,!Space,!TextN{`1},!Space,!EndGroup End Macro Macro CenteredTextH !HorizGroupSC,!Space,!TextH{`1},!Space,!EndGroup End Macro Macro CenteredText3 !HorizGroupSC,!Space,!Text3{`1},!Space,!EndGroup End Macro Macro CenteredTextB !HorizGroupSC,!Space,!TextB{`1},!Space,!EndGroup End Macro Macro CenteredTextID !HorizGroupSC,!Space,!TextID{`1,`2},!Space,!EndGroup End Macro Macro CenteredText_BS !HorizGroupSC,!SpaceB,!TextN{`1},!SpaceB,!EndGroup End Macro Macro TBK1 ; TextBox Kludge 1 needed with V4 !Space,!EndGroup,!SpaceS,!EndGroup End Macro Macro _TextBox #TROB_FrameBox,#TRFB_TEXT End Macro Macro TextBox !_TextBox,!ObjectBackfillB, !VertGroup, !SpaceS, !HorizGroupSC, !Space, !TextN{`1},#TRAT_ID,`2,#TRAT_MinWidth,`3,!TBK1 End Macro Macro ClippedTextBox !_TextBox,!ObjectBackfillB,!VertGroupAC,!SpaceS,!HorizGroupAC,!Space,!ClippedTextID{`1,`2},!TBK1 End Macro Macro ClippedTextBoxMW !_TextBox,!ObjectBackfillB,!VertGroupAC,!SpaceS,!HorizGroupAC,!Space,!ClippedTextID{`1,`2},#TRAT_MinWidth,`3,!TBK1 End Macro Macro TextRIGHT !HorizGroupS,!Space,!TextN{`1},!ID{`2},!EndGroup End Macro Macro Integer #TROB_Text,0,#TRAT_Value,`1 End Macro Macro IntegerH #TROB_Text,0,#TRAT_Value,`1,#TRAT_Flags,#TRTX_HIGHLIGHT End Macro Macro Integer3 #TROB_Text,0,#TRAT_Value,`1,#TRAT_Flags,#TRTX_3D End Macro Macro IntegerB #TROB_Text,0,#TRAT_Value,`1,#TRAT_Flags,#TRTX_BOLD End Macro Macro CenteredInteger !HorizGroupSC,!Space,!Integer{`1},!Space,!EndGroup End Macro Macro CenteredIntegerH !HorizGroupSC,!Space,!IntegerH{`1},!Space,!EndGroup End Macro Macro CenteredInteger3 !HorizGroupSC,!Space,!Integer3{`1},!Space,!EndGroup End Macro Macro CenteredIntegerB !HorizGroupSC,!Space,!IntegerB{`1},!Space,!EndGroup End Macro ; Kludge for longer macro in Blitz, Hope this works! Macro IBK1 !Space,!EndGroup,!SpaceS,!EndGroup End Macro Macro IntegerBox !GroupBox,!ObjectBackfillB,!VertGroup,!SpaceS,!HorizGroupSC,!Space,!Integer{`1},#TRAT_ID,`2,#TRAT_MinWidth,`3,!IBK1 End Macro ;/* Buttons */ Macro Button #TROB_Button,0,#TRAT_Text,`1,#TRAT_ID,`2 End Macro Macro ButtonR #TROB_Button,0,#TRAT_Text,`1,#TRAT_ID,`2,#TRAT_Flags,#TRBU_RETURNOK End Macro Macro ButtonE #TROB_Button,0,#TRAT_Text,`1,#TRAT_ID,`2,#TRAT_Flags,#TRBU_ESCOK End Macro Macro ButtonRE #TROB_Button,0,#TRAT_Text,`1,#TRAT_ID,`2,#TRAT_Flags,#TRBU_RETURNOK|#TRBU_ESCOK End Macro Macro CenteredButton !HorizGroupSC,!Space,#TROB_Button,0,#TRAT_Text,`1,#TRAT_ID,`2,!Space,!EndGroup End Macro Macro CenteredButtonR !HorizGroupSC,!Space,#TROB_Button,0,#TRAT_Flags,#TRBU_RETURNOK,#TRAT_Text,`1,#TRAT_ID,`2,!Space,!EndGroup End Macro Macro CenteredButtonE !HorizGroupSC,!Space,#TROB_Button,0,#TRAT_Flags,#TRBU_ESCOK,#TRAT_Text,`1,#TRAT_ID,`2,!Space,!EndGroup End Macro Macro CenteredButtonRE !HorizGroupSC,Space,#TROB_Button,0,#TRAT_Flags,#TRBU_RETURNOK|#TRBU_ESCOK,#TRAT_Text,`1,#TRAT_ID,`2,!Space,!EndGroup End Macro Macro EmptyButton #TROB_Button,0,#TRAT_Text,Null(""),#TRAT_ID,`1 End Macro Macro GetFileButton #TROB_Button,#TRBT_GETFILE,#TRAT_Text,Null(""),#TRAT_ID,`1,#TRAT_Flags,#TRBU_YRESIZE End Macro Macro GetDrawerButton #TROB_Button,#TRBT_GETDRAWER,#TRAT_Text,Null(""),#TRAT_ID,`1,#TRAT_Flags,#TRBU_YRESIZE End Macro Macro GetEntryButton #TROB_Button,#TRBT_GETENTRY,#TRAT_Text,Null(""),#TRAT_ID,`1,#TRAT_Flags,#TRBU_YRESIZE End Macro Macro GetFileButtonS #TROB_Button,#TRBT_GETFILE,#TRAT_Text,`1,#TRAT_ID,`2,#TRAT_Flags,#TRBU_YRESIZE End Macro Macro GetDrawerButtonS #TROB_Button,#TRBT_GETDRAWER,#TRAT_Text,`1,#TRAT_ID,`2,#TRAT_Flags,#TRBU_YRESIZE End Macro Macro GetEntryButtonS #TROB_Button,#TRBT_GETENTRY,#TRAT_Text,`1,#TRAT_ID,`2,#TRAT_Flags,#TRBU_YRESIZE End Macro ;/* Lines */ Macro _Line #TROB_Line,`1 End Macro Macro HorizSeparator !HorizGroupEC,!Space,!_Line{#TROF_HORIZ},!Space,!EndGroup End Macro Macro VertSeparator !VertGroupEC,!Space,!_Line{#TROF_VERT},!Space,!EndGroup End Macro Macro NamedSeparator !HorizGroupEC,!Space,!_Line{#TROF_HORIZ},!Space,!TextT{`1},!Space,!_Line{#TROF_HORIZ},!Space,!EndGroup End Macro Macro NamedSeparatorI !HorizGroupEC,!Space,!_Line{#TROF_HORIZ},!Space,!TextT{`1},#TRAT_ID,`2,!Space,!_Line{#TROF_HORIZ},!Space,!EndGroup End Macro Macro NamedSeparatorN !HorizGroupEC,!_Line{#TROF_HORIZ},!Space,!TextT{`1},!Space,!_Line{#TROF_HORIZ},!EndGroup End Macro Macro NamedSeparatorIN !HorizGroupEC,!_Line{TROF_HORIZ},!Space,!TextT{`1},#TRAT_ID,`2,!Space,!_Line{#TROF_HORIZ},!EndGroup End Macro ;/* FrameBox */ Macro GroupBox #TROB_FrameBox,#TRFB_GROUPING End Macro Macro NamedFrameBox #TROB_FrameBox,#TRFB_FRAMING,#TRAT_Text,`1 End Macro ;/* DropBox */ Macro DropBox #TROB_DropBox,0,#TRAT_ID,`1 End Macro ;/* CheckBox gadget */ Macro CheckBox #TROB_CheckBox,0,#TRAT_ID,`1 End Macro Macro CheckBoxC #TROB_CheckBox,0,#TRAT_ID,`1,#TRAT_Value,True End Macro Macro CheckBoxLEFT !HorizGroupS,!CheckBox{`1},!Space,!EndGroup End Macro Macro CheckBoxCLEFT !HorizGroupS,!CheckBoxC{`1},!Space,!EndGroup End Macro ;/* String gadget */ Macro _StringGadget #TROB_String,`1,#TRAT_ID,`2 End Macro Macro PasswordGadget #TROB_String,`1,#TRAT_ID,`2,#TRAT_Flags,#TRST_INVISIBLE End Macro Macro StringGadgetNR #TROB_String,`1,#TRAT_ID,`2,#TRAT_Flags,#TRST_NORETURNBROADCAST End Macro ;/* Cycle gadget */ Macro CycleGadget #TROB_Cycle,`1,#TRAT_ID,`3,#TRAT_Value,`2 End Macro Macro MXGadget #TROB_Cycle,`1,#TRAT_ID,`3,#TRAT_Value,`2,#TRAT_Flags,#TRCY_MX End Macro Macro MXGadgetR #TROB_Cycle,`1,#TRAT_ID,`3,#TRAT_Value,`2,#TRAT_Flags,#TRCY_MX|TRCY_RIGHTLABELS End Macro ;/* Slider gadget */ Macro SliderGadget #TROB_Slider,0,#TRSL_Min,`1,#TRSL_Max,`2,#TRAT_ID,`4,#TRAT_Value,`3 End Macro ;/* Palette gadget */ Macro PaletteGadget #TROB_Palette,0,#TRAT_ID,`2,#TRAT_Value,`1 End Macro ;/* Listview gadget */ Macro ListRO #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_READONLY,#TRAT_ID,`2,#TRAT_Value,0,#TRLV_Top,`3 End Macro Macro ListSel #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_SELECT,#TRAT_ID,`2,#TRAT_Value,0,#TRLV_Top,`3 End Macro Macro LK3 ; {top,value} List Kludge 3 #TRAT_Value,`2,#TRLV_Top,`1 End Macro Macro ListSS #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_SHOWSELECTED,#TRAT_ID,`2,#TRAT_Value,`4,#TRLV_Top,`3 End Macro ; it finally works! Macro ListROC AddTags #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_READONLY|#TRLV_NOCURSORKEYS AddTags #TRAT_ID,`2,#TRAT_Value,`3,#TRLV_Top,`3 End Macro Macro ListSelC #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_SELECT|#TRLV_NOCURSORKEYS,#TRAT_ID,`2,!LK3{`3,0} End Macro Macro ListSSC #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_SHOWSELECTED|#TRLV_NOCURSORKEYS,#TRAT_ID,`2,!LK3{`3,`4} End Macro Macro ListRON #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_READONLY|#TRLV_NONUMPADKEYS,#TRAT_ID,`2,!LK3{`3,0} End Macro Macro ListSelN #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_SELECT|#TRLV_NONUMPADKEYS,#TRAT_ID,`2,!LK3{`3,0} End Macro Macro ListSSN #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_SHOWSELECTED|#TRLV_NONUMPADKEYS,#TRAT_ID,`2,!LK3{`3,`4} End Macro Macro LK2 ; {id,top} List Kludge 2 #TRAT_ID,`1,#TRAT_Value,0,#TRLV_Top,`1 End Macro Macro ListROCN #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_READONLY|#TRLV_NOCURSORKEYS|#TRLV_NONUMPADKEYS,!LK2{`2,`3} End Macro Macro ListSelCN #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_SELECT|#TRLV_NOCURSORKEYS|#TRLV_NONUMPADKEYS,!LK2{`2,`3} End Macro Macro LK1 ; (id,top,value) List Kludge 1 #TRAT_ID,`1,#TRAT_Value,`3,#TRLV_Top,`2 End Macro Macro ListSSCN #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_SHOWSELECTED|#TRLV_NOCURSORKEYS|#TRLV_NONUMPADKEYS,!LK1{`2,`3,`4} End Macro Macro FWListRO #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_READONLY,#TRAT_ID,`2,#TRAT_Value,0,#TRLV_Top,`3 End Macro Macro FWListSel #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_SELECT,#TRAT_ID,`2,TRAT_Value,0,#TRLV_Top,`3 End Macro Macro FWListSS #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_SHOWSELECTED,!LK1{`2,`3,`4} End Macro Macro FWListROC #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_READONLY|#TRLV_NOCURSORKEYS,!LK1{`2,0,`3} End Macro Macro FWListSelC #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_SELECT|#TRLV_NOCURSORKEYS,!LK1{`2,0,`3} End Macro Macro FWListSSC #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_SHOWSELECTED|#TRLV_NOCURSORKEYS,!LK1{`2,`3,`4} End Macro Macro FWListRON #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_READONLY|#TRLV_NONUMPADKEYS,!LK2{`2,`3,0} End Macro Macro FWListSelN #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_SELECT|#TRLV_NONUMPADKEYS,!LK2{`2,`3,0} End Macro Macro FWListSSN #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_SHOWSELECTED|#TRLV_NONUMPADKEYS,!LK2{`2,`3,`4} End Macro Macro LK4 ; List Kludge 4 only for a few lines below |#TRLV_NOCURSORKEYS|#TRLV_NONUMPADKEYS End Macro Macro FWListROCN #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_READONLY !LK4,!LK2{`2,`3,0} End Macro Macro FWListSelCN #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_SELECT !LK4,!LK2{`2,`3,0} End Macro Macro FWListSSCN #TROB_Listview,`1,#TRAT_Flags,#TRLV_NOGAP|#TRLV_FWFONT|#TRLV_SHOWSELECTED !LK4,!LK2{`2,`3,`4} End Macro ;/* Progress indicator */ Macro Progress #TROB_Progress,`1,#TRAT_ID,`3,#TRAT_Value,`2 End Macro ;/* Image */ Macro BoopsiImage #TROB_Image,`1,#TRAT_Flags,#TRIM_BOOPSI End Macro Macro BoopsiImageD #TROB_Image,`1,#TRAT_MinWidth,`2,#TRAT_MinHeight,`3,#TRAT_Flags,#TRIM_BOOPSI End Macro ;/* Attributes */ Macro ID #TRAT_ID,`1 End Macro Macro Disabled #TRAT_Disabled,True End Macro Macro ObjectBackfillWin #TRAT_Backfill,#TRBF_WINDOWBACK End Macro Macro ObjectBackfillReq #TRAT_Backfill,#TRBF_REQUESTERBACK End Macro Macro ObjectBackfillB #TRAT_Backfill,#TRBF_NONE End Macro Macro ObjectBackfillS #TRAT_Backfill,#TRBF_SHINE End Macro Macro ObjectBackfillSA #TRAT_Backfill,#TRBF_SHINE_SHADOW End Macro Macro ObjectBackfillSF #TRAT_Backfill,#TRBF_SHINE_FILL End Macro Macro ObjectBackfillSB #TRAT_Backfill,#TRBF_SHINE_BACKGROUND End Macro Macro ObjectBackfillA #TRAT_Backfill,#TRBF_SHADOW End Macro Macro ObjectBackfillAF #TRAT_Backfill,#TRBF_SHADOW_FILL End Macro Macro ObjectBackfillAB #TRAT_Backfill,#TRBF_SHADOW_BACKGROUND End Macro Macro ObjectBackfillF #TRAT_Backfill,#TRBF_FILL End Macro Macro ObjectBackfillFB #TRAT_Backfill,#TRBF_FILL_BACKGROUND End Macro ;/* Requester support */ ;Kludge for longer macro (again!) Macro reqk !WindowFlags{#TRWF_NOZIPGADGET|#TRWF_NOSIZEGADGET|#TRWF_NOCLOSEGADGET|#TRWF_NODELZIP|#TRWF_NOESCCLOSE} End Macro Macro BeginRequester !WindowTitle{`1},!WindowPosition{`2},!WindowBackfillReq,!reqk,!VertGroupA,!Space,!HorizGroupA,!Space,!GroupBox,!ObjectBackfillB End Macro Macro BeginRequesterGads !Space,!EndGroup,!Space End Macro Macro EndRequester !Space,!EndGroup,!EndProject End Macro ;/* ////////////////////////////////////////////////////////////////////// */ ;/* /////////////////////////////////////////////////// Support library // */ ;/* ////////////////////////////////////////////////////////////////////// */ ;#Application=__Triton_Support_App ;/* ////////////////////////////////////////////////////////////////////// */ ;/* //////////////////////////////////////////////// The Triton message // */ ;/* ////////////////////////////////////////////////////////////////////// */ NEWTYPE .TR_Message *trm_Project.TR_Project trm_ID.l ;/* The object's ID (where appropriate) */ trm_Class.l ;/* The Triton message class */ trm_Data.l ;/* The class-specific data */ trm_Code.l ;/* Currently only used by TRMS_KEYPRESSED */ trm_Qualifier.l ;/* IEQUALIFIERs */ trm_Seconds.l ;/* \ Copy of system clock time (Only where */ trm_Micros.l ;/* / available! If not set, trm_Seconds is 0L) */ *trm_App.TR_App End NEWTYPE ;/* Message classes */ #TRMS_CLOSEWINDOW =1 ; The window should be closed */ #TRMS_ERROR =2 ; An error occured. Error code in trm_Data */ #TRMS_NEWVALUE =3 ; Object's value has changed. New value in trm_Data */ #TRMS_ACTION =4 ; Object has triggered an action */ #TRMS_ICONDROPPED =5 ; Icon dropped over window (ID=0)|DropBox. AppMessage* in trm_Data */ #TRMS_KEYPRESSED =6 ; Key pressed. trm_Data contains ASCII code, trm_Code raw code and */ #TRMS_HELP =7 ; The user requested help for the specified ID */ #TRMS_DISKINSERTED =8 ; A disk has been inserted into a drive #TRMS_DISKREMOVED =9 ; A disk has been removed from a drive ;/* ////////////////////////////////////////////////////////////////////// */ ;/* //////////////////////////////////////////////// Triton error codes // */ ;/* ////////////////////////////////////////////////////////////////////// */ #TRER_OK =0 ; No error */ #TRER_ALLOCMEM =1 ; Not enough memory */ #TRER_OPENWINDOW =2 ; Can't open window */ #TRER_WINDOWTOOBIG =3 ; Window would be too big for screen */ #TRER_DRAWINFO =4 ; Can't get screen's DrawInfo */ #TRER_OPENFONT =5 ; Can't open font */ #TRER_CREATEMSGPORT =6 ; Can't create message port */ #TRER_INSTALLOBJECT =7 ; Can't create an object */ #TRER_CREATECLASS =8 ; Can't create a class */ #TRER_NOLOCKPUBSCREEN =9 ; Can't lock public screen */ #TRER_CREATEMENUS =12; Error while creating the menus */ #TRER_GT_CREATECONTEXT=14; Can't create gadget context */ #TRER_MAXERRORNUM =15; PRIVATE! */ ; Object Messages #TROM_ACTIVATE=23 ;/* ////////////////////////////////////////////////////////////////////// */ ;/* ///////////////////////////////////////// Tags for TR_OpenProject() // */ ;/* ////////////////////////////////////////////////////////////////////// */ ;/* Tag bases */ #TRTG_OAT =#TAG_USER+$400 ;/* Object attribute */ #TRTG_OBJ =#TAG_USER+$100 ;/* Object ID */ #TRTG_OAT2=#TAG_USER+$80 ;/* PRIVATE! */ #TRTG_PAT =#TAG_USER ;/* Project attribute */ ;#TRTG_SER(ser)=(ser <<11) ;macro TRTG_SER ;`1 LSL 11 ;end macro ;/* Window/Project */ #TRWI_Title= #TRTG_PAT+$01 ;/* STRPTR: The window title */ #TRWI_Flags= #TRTG_PAT+$02 ;/* See below for window flags */ #TRWI_Underscore= #TRTG_PAT+$03 ;/* char *: The underscore for menu and gadget shortcuts */ #TRWI_Position= #TRTG_PAT+$04 ;/* Window position, see below */ #TRWI_CustomScreen= #TRTG_PAT+$05 ;/* struct Screen * */ #TRWI_PubScreen= #TRTG_PAT+$06 ;/* struct Screen *, must have been locked! */ #TRWI_PubScreenName= #TRTG_PAT+$07 ;/* STRPTR, Triton is doing the locking */ #TRWI_PropFontAttr= #TRTG_PAT+$08 ;/* struct TextAttr *: The proportional font */ #TRWI_FixedWidthFontAttr=#TRTG_PAT+$09 ;/* struct TextAttr *: The fixed-width font */ #TRWI_Backfill= #TRTG_PAT+$0A ;/* The backfill type, see below */ #TRWI_ID= #TRTG_PAT+$0B ;/* ULONG: The window ID */ #TRWI_Dimensions= #TRTG_PAT+$0C ;/* struct TR_Dimensions * */ #TRWI_ScreenTitle= #TRTG_PAT+$0D ;/* STRPTR: The screen title */ #TRWI_QuickHelp= #TRTG_PAT+$0E ; BOO: Quick Help active? ;/* Menus */ #TRMN_Title= #TRTG_PAT+$65 ;/* STRPTR: Menu */ #TRMN_Item= #TRTG_PAT+$66 ;/* STRPTR: Menu item */ #TRMN_Sub= #TRTG_PAT+$67 ;/* STRPTR: Menu subitem */ #TRMN_Flags= #TRTG_PAT+$68 ;/* See below for flags */ ;/* General object attributes */ #TRAT_ID= #TRTG_OAT2+$16 ;/* The object's/menu's ID */ #TRAT_Flags= #TRTG_OAT2+$17 ;/* The object's flags */ #TRAT_Value= #TRTG_OAT2+$18 ;/* The object's value */ #TRAT_Text= #TRTG_OAT2+$19 ;/* The object's text */ #TRAT_Disabled=#TRTG_OAT2+$1A ;/* Disabled object? */ #TRAT_Backfill=#TRTG_OAT2+$1B ;/* Backfill pattern */ #TRAT_MinWidth=#TRTG_OAT2+$1C ;/* Minimum width */ #TRAT_MinHeight=#TRTG_OAT2+$1D ;/* Minimum height */ ;/* ////////////////////////////////////////////////////////////////////// */ ;/* ////////////////////////////////////////////////////// Window flags // */ ;/* ////////////////////////////////////////////////////////////////////// */ #TRWF_BACKDROP =$00000001 ; Create a backdrop borderless window */ #TRWF_NODRAGBAR =$00000002 ; Don't use a dragbar */ #TRWF_NODEPTHGADGET =$00000004 ; Don't use a depth-gadget */ #TRWF_NOCLOSEGADGET =$00000008 ; Don't use a close-gadget */ #TRWF_NOACTIVATE =$00000010 ; Don't activate window */ #TRWF_NOESCCLOSE =$00000020 ; Don't send TRMS_CLOSEWINDOW when Esc is pressed */ #TRWF_NOPSCRFALLBACK =$00000040 ; Don't fall back onto default PubScreen */ #TRWF_NOZIPGADGET =$00000080 ; Don't use a zip-gadget */ #TRWF_ZIPCENTERTOP =$00000100 ; Center the zipped window on the title bar */ #TRWF_NOMINTEXTWIDTH =$00000200 ; Minimum window width not according to title text */ #TRWF_NOSIZEGADGET =$00000400 ; Don't use a sizing-gadget */ #TRWF_NOFONTFALLBACK =$00000800 ; Don't fall back to topaz.8 */ #TRWF_NODELZIP =$00001000 ; Don't zip the window when Del is pressed */ #TRWF_SIMPLEREFRESH =$00002000 ; *** OBSOLETE *** (V3+) */ #TRWF_ZIPTOCURRENTPOS =$00004000 ; Will zip the window at the current position (OS3.0+) */ #TRWF_APPWINDOW =$00008000 ; Create an AppWindow without using class_dropbox */ #TRWF_ACTIVATESTRGAD =$00010000 ; Activate the first string gadget after opening the window */ #TRWF_HELP =$00020000 ; Pressing <Help> will create a TRMS_HELP message */ #TRWF_SYSTEMACTION =$00040000 ; System status message will be sent (V4) ;/* ////////////////////////////////////////////////////////////////////// */ ;/* //////////////////////////////////////////////////////// Menu flags // */ ;/* ////////////////////////////////////////////////////////////////////// */ #TRMF_CHECKIT =$00000001 ; Leave space for a checkmark */ #TRMF_CHECKED =$00000002 ; Check the item (includes TRMF_CHECKIT) */ #TRMF_DISABLED =$00000004 ; Ghost the menu/item */ ;/* ////////////////////////////////////////////////////////////////////// */ ;/* ////////////////////////////////////////////////// Window positions // */ ;/* ////////////////////////////////////////////////////////////////////// */ #TRWP_DEFAULT =0 ; Let Triton choose a good position */ #TRWP_BELOWTITLEBAR =1 ; Left side of screen, below title bar */ #TRWP_CENTERTOP =1025 ; Top of screen, centered on the title bar */ #TRWP_TOPLEFTSCREEN =1026 ; Top left corner of screen */ #TRWP_CENTERSCREEN =1027 ; Centered on the screen */ #TRWP_CENTERDISPLAY =1028 ; Centered on the currently displayed clip */ #TRWP_MOUSEPOINTER =1029 ; Under the mouse pointer */ #TRWP_ABOVECOORDS =2049 ; Above coordinates from the dimensions struct #TRWP_BELOWCOORDS =2050 ; Below coordinates from the dimension struct ;/* ////////////////////////////////////////////////////////////////////// */ ;/* //////////////////////////////////// Backfill types / System images // */ ;/* ////////////////////////////////////////////////////////////////////// */ #TRBF_WINDOWBACK =$00000000 ; Window backfill */ #TRBF_REQUESTERBACK =$00000001 ; Requester backfill */ #TRBF_NONE =$00000002 ; No backfill (= Fill with BACKGROUNDPEN) */ #TRBF_SHINE =$00000003 ; Fill with SHINEPEN */ #TRBF_SHINE_SHADOW =$00000004 ; Fill with SHINEPEN + SHADOWPEN */ #TRBF_SHINE_FILL =$00000005 ; Fill with SHINEPEN + FILLPEN */ #TRBF_SHINE_BACKGROUND =$00000006 ; Fill with SHINEPEN + BACKGROUNDPEN */ #TRBF_SHADOW =$00000007 ; Fill with SHADOWPEN */ #TRBF_SHADOW_FILL =$00000008 ; Fill with SHADOWPEN + FILLPEN */ #TRBF_SHADOW_BACKGROUND =$00000009 ; Fill with SHADOWPEN + BACKGROUNDPEN */ #TRBF_FILL =$0000000A ; Fill with FILLPEN */ #TRBF_FILL_BACKGROUND =$0000000B ; Fill with FILLPEN + BACKGROUNDPEN */ #TRSI_USBUTTONBACK =$00010002 ; Unselected button backfill */ #TRSI_SBUTTONBACK =$00010003 ; Selected button backfill */ ;/* ////////////////////////////////////////////////////////////////////// */ ;/* ////////////////////////////////////////////// Display Object flags // */ ;/* ////////////////////////////////////////////////////////////////////// */ ;/* General flags */ #TROF_RAISED =$00000001 ; Raised object */ #TROF_HORIZ =$00000002 ; Horizontal object \ Works automatically */ #TROF_VERT =$00000004 ; Vertical object / in groups */ #TROF_RIGHTALIGN =$00000008 ; Align object to the right border if available */ ;/* Text flags */ #TRTX_NOUNDERSCORE =$00000100 ; Don't interpret underscores */ #TRTX_HIGHLIGHT =$00000200 ; Highlight text */ #TRTX_3D =$00000400 ; 3D design */ #TRTX_BOLD =$00000800 ; Softstyle 'bold' */ #TRTX_TITLE =$00001000 ; A title (e.g. of a group) */ #TRTX_SELECTED =$00002000 ; PRIVATE! */ ;/* ////////////////////////////////////////////////////////////////////// */ ;/* ////////////////////////////////////////////////////// Menu entries // */ ;/* ////////////////////////////////////////////////////////////////////// */ #TRMN_BARLABEL=-1 ;/* A barlabel instead of text */ ;/* ////////////////////////////////////////////////////////////////////// */ ;/* /////////////////////////////////////////// Tags for TR_CreateApp() // */ ;/* ////////////////////////////////////////////////////////////////////// */ #TRCA_Name =#TAG_USER+1 #TRCA_LongName =#TAG_USER+2 #TRCA_Info =#TAG_USER+3 #TRCA_Version =#TAG_USER+4 #TRCA_Release =#TAG_USER+5 #TRCA_Date =#TAG_USER+6 ;/* ////////////////////////////////////////////////////////////////////// */ ;/* ///////////////////////////////////////// Tags for TR_EasyRequest() // */ ;/* ////////////////////////////////////////////////////////////////////// */ #TREZ_ReqPos =#TAG_USER+1 #TREZ_LockProject =#TAG_USER+2 #TREZ_Return =#TAG_USER+3 #TREZ_Title =#TAG_USER+4 #TREZ_Activate =#TAG_USER+5 ;/* ////////////////////////////////////////////////////////////////////// */ ;/* ///////////////////////////////////////// The Application Structure // */ ;/* ////////////////////////////////////////////////////////////////////// */ NEWTYPE .TR_App *tra_MemPool.w tra_BitMask.l ;/* Bits to Wait() for */ tra_LastError.l ;/* TRER code of last error */ tra_Name.l ;/* Unique name */ tra_LongName.l ;/* User-readable name */ tra_Info.l ;/* Info string */ tra_Version.l ;/* Version */ tra_Release.l ;/* Release */ tra_Date.l ;/* Compilation date */ *tra_AppPort.MsgPort *tra_IDCMPPort.MsgPort *tra_Prefs.w *tra_LastProject.TR_Project *tra_InputEvent.InputEvent End NEWTYPE ;/* ////////////////////////////////////////////////////////////////////// */ ;/* ////////////////////////////////////////// The Dimensions Structure // */ ;/* ////////////////////////////////////////////////////////////////////// */ NEWTYPE .TR_Dimensions trd_Left.w ;/* Left */ trd_Top.w ;/* Top */ trd_Width.w ;/* Width */ trd_Height.w ;/* Height */ trd_Left2.w ;/* Left */ trd_Top2.w ;/* Top */ trd_Width2.w ;/* Width */ trd_Height2.w ;/* Height */ trd_Zoomed.w ;/* Window zoomed? */ reserved.w[3] ;/* For future expansions */ End NEWTYPE ;/* ////////////////////////////////////////////////////////////////////// */ ;/* ///////////////////////////////////////////// The Project Structure // */ ;/* ////////////////////////////////////////////////////////////////////// */ NEWTYPE .TR_Project ;;;;;;;; PRIVATE!!!! ;;;;;;;; *trp_App.TR_App *trp_Screen.Screen trp_ScreenType.l ; Type of screen (WA_...Screen) trp_ID.l ;Project's ID *trp_LockedPubScreen.Screen trp_ScreenTitle.l ; The screen title */ *trp_Window.Window *trp_AppWindow.AppWindow trp_IDCMPFlags.l ; The IDCMP flags */ trp_Flags.l ; Triton window flags */ *trp_NewMenu.NewMenu trp_NewMenuSize.l ; The number of menu items in the list */ *trp_Menu.Menu trp_NextSelect.w ; The next selected menu item */ *trp_VisualInfo.w *trp_DrawInfo.DrawInfo *trp_UserDimensions.TR_Dimensions *trp_Dimensions.TR_Dimensions trp_WindowStdHeight.l ; The standard height of the window */ trp_LeftBorder.l ; The width of the left window border */ trp_RightBorder.l ; The width of the right window border */ trp_TopBorder.l ; The height of the top window border */ trp_BottomBorder.l ; The height of the bottom window border */ trp_InnerWidth.l ; The inner width of the window */ trp_InnerHeight.l ; The inner height of the window */ trp_ZipDimensions.w[4] ; The dimensions for the zipped window */ trp_AspectFixing.w ; Pixel aspect correction factor */ trp_ObjectList.MinList ; The list of display objects */ trp_MenuList.MinList ; The list of menus */ trp_IDList.MinList ; The ID linking list (menus & objects) */ *trp_MemPool.w trp_HasObjects.w ; Do we have display objects ? */ *trp_PropAttr.TextAttr *trp_FixedWidthAttr.TextAttr *trp_PropFont.TextFont *trp_FixedWidthFont.TextFont trp_OpenedPropFont.w ; \ Have we opened the fonts ? */ trp_OpenedFixedWidthFont.w; / */ trp_TotalPropFontHeight.w ; Height of prop font incl. underscore */ trp_BackfillType.l ; The backfill type */ *trp_BackfillHook.Hook *trp_GadToolsGadgetList.Gadget *trp_PrevGadget.Gadget *trp_NewGadget.NewGadget *trp_InvisibleRequest.Requester trp_IsUserLocked.w ; Project locked by the user? */ trp_CurrentID.l ; The currently keyboard-selected ID */ trp_IsCancelDown.w ; Cancellation key pressed? */ trp_IsShortcutDown.w ; Shortcut key pressed? */ trp_Underscore.b ; The underscore character */ trp_EscClose.w ; Close window on Esc ? */ trp_DelZip.w ; Zip window on Del ? */ trp_PubScreenFallBack.w ; Fall back onto default public screen ? */ trp_FontFallBack.w ; Fall back to topaz.8 ? */ trp_OldWidth.w ; Old window width */ trp_OldHeight.w ; Old window height */ *trp_QuickHelpWindow.Window ; *trp_QuickHelpObject.#TROD_DisplayObject trp_TicksPassed.l End NEWTYPE ;/* ////////////////////////////////////////////////////////////////////// */ ;/* ///////////////////////////// Default classes, attributes and flags // */ ;/* ////////////////////////////////////////////////////////////////////// */ ;** The following code has been assembled automatically from the class ; sources and may therefore look somehow unstructured and chaotic ;) ** ;/* class_DisplayObject */ #TROB_DisplayObject =#TRTG_OBJ+$3C ;/* A basic display object */ #TRDO_QuickHelpString=#TRTG_OAT+$1E3 ;/* class_Group */ #TRGR_Horiz=#TAG_USER+201 ;/* Horizontal group */ #TRGR_Vert= #TAG_USER+202 ;/* Vertical group */ #TRGR_End= #TRTG_OAT2+$4B ;/* End of a group */ #TRGR_PROPSHARE =$00000000 ;/* Default: Divide objects proportionally */ #TRGR_EQUALSHARE=$00000001 ;/* Divide objects equally */ #TRGR_PROPSPACES=$00000002 ;/* Divide spaces proportionally */ #TRGR_ARRAY =$00000004 ;/* Top-level array group */ #TRGR_ALIGN =$00000008 ;/* Align resizeable objects in secondary dimension */ #TRGR_CENTER =$00000010 ;/* Center unresizeable objects in secondary dimension */ #TRGR_FIXHORIZ =$00000020 ;/* Don't allow horizontal resizing */ #TRGR_FIXVERT =$00000040 ;/* Don't allow vertical resizing */ #TRGR_INDEP =$00000080 ;/* Group is independant of surrounding array */ ;/* class_Space */ #TROB_Space =#TRTG_OBJ+$285 ;/* The spaces class */ #TRST_NONE =1 ;/* No space */ #TRST_SMALL =2 ;/* Small space */ #TRST_NORMAL=3 ;/* Normal space (default) */ #TRST_BIG =4 ;/* Big space */ ;/* class_CheckBox */ #TROB_CheckBox=#TRTG_OBJ+$2F ; /* A checkbox gadget */ ;/* class_Object */ #TROB_Object=#TRTG_OBJ+$3D ;/* A rootclass object */ ;/* class_Cycle */ #TROB_Cycle =#TRTG_OBJ+$36 ;/* A cycle gadget */ #TRCY_MX =$00010000 ;/* Unfold the cycle gadget to a MX gadget */ #TRCY_RIGHTLABELS=$00020000 ;/* Put the labels to the right of a MX gadget */ ;/* class_DropBox */ #TROB_DropBox=#TRTG_OBJ+$38 ;/* An icon drop box */ ;/* class_Scroller */ #TROB_Scroller=#TRTG_OBJ+$35 ;/* A scroller gadget */ #TRSC_Total=#TRTG_OAT+$1E0 #TRSC_Visible=#TRTG_OAT+$1E1 ;/* class_FrameBox */ #TROB_FrameBox=#TRTG_OBJ+$32 ;/* A framing box */ #TRFB_GROUPING=$00000001 ;/* A grouping box */ #TRFB_FRAMING=$00000002 ;/* A framing box */ #TRFB_TEXT=$00000004 ;/* A text container */ ;/* class_Button */ #TROB_Button =#TRTG_OBJ+$31 ;/* A BOOPSI button gadget */ #TRBU_RETURNOK =$00010000 ;/* <Return> answers the button */ #TRBU_ESCOK =$00020000 ;/* <Esc> answers the button */ #TRBU_SHIFTED =$00040000 ;/* Shifted shortcut only */ #TRBU_UNSHIFTED =$00080000 ;/* Unshifted shortcut only */ #TRBU_YRESIZE =$00100000 ;/* Button resizeable in Y direction */ #TRBT_TEXT =0 ;/* Text button */ #TRBT_GETFILE =1 ;/* GetFile button */ #TRBT_GETDRAWER =2 ;/* GetDrawer button */ #TRBT_GETENTRY =3 ;/* GetEntry button */ ;/* class_Line */ #TROB_Line=#TRTG_OBJ+$2D ;/* A simple line */ ;/* class_Palette */ #TROB_Palette=#TRTG_OBJ+$33 ;/* A palette gadget */ ;/* class_Slider */ #TROB_Slider=#TRTG_OBJ+$34 ;/* A slider gadget */ #TRSL_Min=#TRTG_OAT+$1DE #TRSL_Max=#TRTG_OAT+$1DF ;/* class_Progress */ #TROB_Progress=#TRTG_OBJ+$3A ;/* A progress indicator */ ;/* class_Text */ #TROB_Text=#TRTG_OBJ+$30 ;/* A line of text */ #TRTX_CLIPPED=$00010000 ;/* class_Listview */ #TROB_Listview=#TRTG_OBJ+$39 ;/* A listview gadget */ #TRLV_Top =#TRTG_OAT+$1E2 #TRLV_READONLY =$10000 ;/* A read-only list */ #TRLV_SELECT =$20000 ;/* You may select an entry */ #TRLV_SHOWSELECTED =$40000 ;/* Selected entry will be shown */ #TRLV_NOCURSORKEYS =$80000 ;/* Don't use arrow keys */ #TRLV_NONUMPADKEYS =$100000 ;/* Don't use numeric keypad keys */ #TRLV_FWFONT =$200000 ;/* Use the fixed-width font */ #TRLV_NOGAP =$400000 ;/* Don't leave a gap below the list */ ;/* class_String */ #TROB_String=#TRTG_OBJ+$37 ;/* A string gadget */ #TRST_INVISIBLE =$00010000 #TRST_NORETURNBROADCAST=$00020000 ;/* class_Image */ #TROB_Image =#TRTG_OBJ+$3B ;/* An image */ #TRIM_BOOPSI=$00010000 ;/* Use a BOOPSI IClass image */ ;/* End of automatically assembled code */ ; NOT FOR BLITZ IT AIN'T ! ;/* ////////////////////////////////////////////////////////////////////// */ ;/* /////////////////////////////////////////////////////////// The End // */ ;/* ////////////////////////////////////////////////////////////////////// */